home *** CD-ROM | disk | FTP | other *** search
/ Compute! Gazette 1988 July / 1988-07.d64 / 64 sprites (.txt) < prev    next >
Commodore BASIC  |  2022-09-20  |  3KB  |  64 lines
  1. 10 rem 64 sprites - copyright 1988 compute! publications, inc.
  2. 20 rem registers: all
  3. 30 v=49152:s=49664:o=s+82:i=s+161:df=s+209
  4. 40 print"[147]";:pokes+1,8:sysi
  5. 50 forx=vtov+447:readd:pokex,d:next
  6. 60 syss
  7. 70 forx=12288to16383:pokex,255:next
  8. 1000 data32,32,32,32,32,32,32,32:rem 0x
  9. 1001 data52,77,102,127,152,177,202,227:rem 0y
  10. 1002 data72,72,72,72,72,72,72,72:rem 1x
  11. 1003 data52,77,102,127,152,177,202,227:rem 1y
  12. 1004 data112,112,112,112,112,112,112,112:rem 2x
  13. 1005 data52,77,102,127,152,177,202,227:rem 2y
  14. 1006 data152,152,152,152,152,152,152,152:rem 3x
  15. 1007 data52,77,102,127,152,177,202,227:rem 3y
  16. 1008 data192,192,192,192,192,192,192,192:rem 4x
  17. 1009 data52,77,102,127,152,177,202,227:rem 4y
  18. 1010 data232,232,232,232,232,232,232,232:rem 5x
  19. 1011 data52,77,102,127,152,177,202,227:rem 5y
  20. 1012 data16,16,16,16,16,16,16,16:rem 6x
  21. 1013 data52,77,102,127,152,177,202,227:rem 6y
  22. 1014 data56,56,56,56,56,56,56,56:rem 7x
  23. 1015 data52,77,102,127,152,177,202,227:rem 7y
  24. 1016 data192,192,192,192,192,192,192,192:rem msb
  25. 1017 data27,27,27,27,27,27,27,27:rem 53265
  26. 1018 data70,95,120,145,170,195,220,1:rem raster
  27. 1019 data0,0,0,0,0,0,0,0:rem lpx
  28. 1020 data0,0,0,0,0,0,0,0:rem lpy
  29. 1021 data255,255,255,255,255,255,255,255:rem sprite enable
  30. 1022 data200,200,200,200,200,200,200,200:rem 53270
  31. 1023 data0,0,0,0,0,0,0,0:rem y expand
  32. 1024 data21,21,21,21,21,21,21,21:rem mem control
  33. 1025 data0,0,0,0,120,120,120,120:rem interrupt flag
  34. 1026 data0,0,0,0,240,240,240,240:rem interrupt enable
  35. 1027 data255,255,255,255,255,255,255,255:rem sprite priority
  36. 1028 data0,0,0,0,0,0,0,0:rem sprite multicolor mode
  37. 1029 data0,0,0,0,0,0,0,0:rem sprite x expand
  38. 1030 data0,0,0,0,0,0,0,0:rem sprite-sprite collision
  39. 1031 data0,0,0,0,0,0,0,0:rem sprite-data collision
  40. 1032 data1,1,1,1,1,1,1,1:rem border color
  41. 1033 data0,0,0,0,0,0,0,0:rem background 0
  42. 1034 data2,2,2,2,240,240,240,240:rem background 1
  43. 1035 data3,3,3,3,241,241,241,241:rem background 2
  44. 1036 data4,4,4,4,242,242,242,242:rem background 3
  45. 1037 data2,5,7,5,243,243,243,243:rem sprite mcm 0
  46. 1038 data3,6,5,6,244,244,244,244:rem sprite mcm 1
  47. 1039 data11,12,15,1,5,13,7,9:rem 0color
  48. 1040 data12,15,1,5,13,7,9,2:rem 1color
  49. 1041 data15,1,5,13,7,9,2,8:rem 2color
  50. 1042 data1,5,13,7,9,2,8,10:rem 3color
  51. 1043 data5,13,7,9,2,8,10,4:rem 4color
  52. 1044 data13,7,9,2,8,10,4,6:rem 5color
  53. 1045 data7,9,2,8,10,4,6,14:rem 6color
  54. 1046 data9,2,8,10,4,6,14,3:rem 7color
  55. 1047 data199,199,199,199,199,199,199,199:rem bank
  56. 1048 data 192,200,208,216,224,232,240,248:rem 0definition
  57. 1049 data 193,201,209,217,225,233,241,249:rem 1definition
  58. 1050 data 194,202,210,218,226,234,242,250:rem 2definition
  59. 1051 data 195,203,211,219,227,235,243,251:rem 3definition
  60. 1052 data 196,204,212,220,228,236,244,252:rem 4definition
  61. 1053 data 197,205,213,221,229,237,245,253:rem 5definition
  62. 1054 data 198,206,214,222,230,238,246,254:rem 6definition
  63. 1055 data 199,207,215,223,231,239,247,255:rem 7definition
  64.